﻿Public Class DataEventArgs(Of T)
    Inherits EventArgs

    Public Sub New(ByVal item As T, ByVal result As Boolean)
        Me.Item = item
        Me.Result = result
    End Sub

    Private _dateItem As T
    Public Property Item() As T
        Get
            Return _dateItem
        End Get
        Set(ByVal value As T)
            _dateItem = value
        End Set
    End Property

    Private _result As Boolean
    Public Property Result() As Boolean
        Get
            Return _result
        End Get
        Set(ByVal value As Boolean)
            _result = value
        End Set
    End Property

End Class
